object frmShortcuts: TfrmShortcuts Left = 232 Top = 136 AutoScroll = False Caption = 'frmShortcuts' ClientHeight = 455 ClientWidth = 688 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False Position = poOwnerFormCenter OnCreate = FormCreate DesignSize = ( 688 455) PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 8 Top = 8 Width = 545 Height = 49 AutoSize = False Caption = 'Please select registry entry you wish to fix. Click an item with' + ' your right mouse button to view additional options.' Transparent = True end object ListView1: TListView Left = 8 Top = 32 Width = 665 Height = 378 Anchors = [akLeft, akTop, akRight, akBottom] Checkboxes = True Columns = < item Caption = 'Name' Width = 160 end item Caption = 'Target' Width = 200 end item Caption = 'Location' Width = 160 end item AutoSize = True Caption = 'Description' end> Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ReadOnly = True RowSelect = True ParentFont = False PopupMenu = PopupMenu1 TabOrder = 0 ViewStyle = vsReport end object btnOK: TBitBtn Left = 504 Top = 424 Width = 75 Height = 25 Anchors = [akRight, akBottom] Caption = 'OK' ModalResult = 1 TabOrder = 1 OnClick = btnOKClick end object btnCancel: TBitBtn Left = 598 Top = 424 Width = 75 Height = 25 Anchors = [akRight, akBottom] Caption = 'Cancel' ModalResult = 2 TabOrder = 2 end object PopupMenu1: TPopupMenu Left = 256 Top = 168 object FixShortcut2: TMenuItem Action = actfix Default = True end object N4: TMenuItem Caption = '-' end object CheckAll2: TMenuItem Action = actchkall end object CheckNone2: TMenuItem Action = actchknone end object CheckInvert2: TMenuItem Action = actchkinvert end object N5: TMenuItem Caption = '-' end object Check1: TMenuItem Action = actfolder end object N1: TMenuItem Caption = '-' end object Properties2: TMenuItem Action = actproperties end end object ActionList1: TActionList Left = 368 Top = 112 object actfix: TAction Caption = 'Fix Shortcut' ImageIndex = 1 OnExecute = actfixExecute end object actproperties: TAction Caption = 'Properties' ImageIndex = 3 OnExecute = actpropertiesExecute end object actfolder: TAction Caption = 'Explorer' ImageIndex = 4 OnExecute = actfolderExecute end object actchknone: TAction Category = 'check' Caption = 'Check None' OnExecute = actchknoneExecute end object actchkall: TAction Category = 'check' Caption = 'Check All' OnExecute = actchkallExecute end object actchkinvert: TAction Category = 'check' Caption = 'Check Invert' OnExecute = actchkinvertExecute end end object OpenDialog1: TOpenDialog Left = 320 Top = 104 end end